home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
asm_msc1.arc
/
EX61.ASM
< prev
next >
Wrap
Assembly Source File
|
1988-11-20
|
768b
|
25 lines
TITLE Random Number Between 0 and 51 (EX61.ASM)
PAGE ,132
OUR_CODE SEGMENT PARA 'CODE'
PUBLIC RAND_51
RAND_51 PROC FAR
ASSUME CS:OUR_CODE
PUSH CX ;Save INT 1AH registers
PUSH DX
PUSH AX
STI
MOV AH,0 ;Read the timer
INT 1AH
MOV AX,DX ;Move low count into AX
AND AX,1FFFH ; and strip off high 3 bits
MOV DL,52 ;Divide low count by 52
DIV DL
POP DX ;Restore AL
MOV AL,DL
POP DX ;Restore DX and CX,
POP CX
RET ; then exit
RAND_51 ENDP
OUR_CODE ENDS
END RAND_51